home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 6 (Reseller Edition) / Apple Ref. & Pres. Lib.v6.0.toast / mac / Ref & Pres Lib. v6.0 Reseller / background_9462.xml < prev    next >
Extensible Markup Language  |  1990-12-20  |  7KB  |  173 lines
  1. <?xml version="1.0" encoding="utf-8" ?>
  2. <!DOCTYPE background PUBLIC "-//Apple, Inc.//DTD background V 2.0//EN" "" >
  3. <background>
  4.     <id>9462</id>
  5.     <filler1>0</filler1>
  6.     <bitmap>BMAP_14509.pbm</bitmap>
  7.     <cantDelete> <false /> </cantDelete>
  8.     <showPict> <true /> </showPict>
  9.     <dontSearch> <false /> </dontSearch>
  10.     <link rel="stylesheet" type="text/css" href="stylesheet_7512.css" />
  11.     <part>
  12.         <id>41</id>
  13.         <type>field</type>
  14.         <visible> <true /> </visible>
  15.         <dontWrap> <false /> </dontWrap>
  16.         <dontSearch> <false /> </dontSearch>
  17.         <sharedText> <false /> </sharedText>
  18.         <fixedLineHeight> <true /> </fixedLineHeight>
  19.         <autoTab> <false /> </autoTab>
  20.         <lockText> <true /> </lockText>
  21.         <rect>
  22.             <left>184</left>
  23.             <top>198</top>
  24.             <right>510</right>
  25.             <bottom>287</bottom>
  26.         </rect>
  27.         <style>scrolling</style>
  28.         <autoSelect> <false /> </autoSelect>
  29.         <showLines> <false /> </showLines>
  30.         <wideMargins> <false /> </wideMargins>
  31.         <multipleLines> <false /> </multipleLines>
  32.         <reservedFamily> 0 </reservedFamily>
  33.         <titleWidth>0</titleWidth>
  34.         <icon>0</icon>
  35.         <textAlign>left</textAlign>
  36.         <font>Geneva</font>
  37.         <textSize>9</textSize>
  38.         <textStyle>plain</textStyle>
  39.         <textHeight>12</textHeight>
  40.         <name>found files</name>
  41.         <script>on mouseUpglobal insertionPoint,chosenLine,gOtherCdList6,gCdNameList6,gCdIDList6if me is "" then exit mouseupput word 2 of the clickLine into tLineput line tLine of me into fileToSeeif fileToSee = "" thenselect before char insertionPoint of fld "toFind"exit mouseUpend ifspinCursorselectLine tLine,name of mespinCursorget the mouseClickLinkToCard line tLine of me,"none"put fld "Title" into fileToSeeif fileToSee is not "D e v e l o p:" and fileToSee is not "Apple II Partition Index" thenif there is a fld "Category" thenSpinCursorpush cdset lockmessages to trueput fld "Category" into catput fld "SubCategory" into subCatput (line (lineOffset(cat,gCdNameList6)) of gCdIDList6) into cdIDput (lineOffset(subCat,fld "categories" of cd id cdID)) into theLineput linkedText(theLine,fld "Index" of cd id cdID) into gOtherCdList6if char 1 of gOtherCdList6 is not return then put return before gOtherCdList6put lineOffset(fileToSee,gOtherCdList6) before gOtherCdList6set lockmessages to falsepop cdend ifend ifsend openCard to this cdrepeat until not the lockscreenunlock screen with iris openend repeatend mouseUpfunction linkedText theLine,theListsubtract 1 from theLinespinCursorput "Œ©" into delimrepeat for theLinedelete char 1 to offset(delim,theList) of theListend repeatspinCursorreturn char 1 to offset(delim,theList)-1 of theListend linkedText</script>
  42.     </part>
  43.     <part>
  44.         <id>6</id>
  45.         <type>field</type>
  46.         <visible> <true /> </visible>
  47.         <dontWrap> <false /> </dontWrap>
  48.         <dontSearch> <false /> </dontSearch>
  49.         <sharedText> <false /> </sharedText>
  50.         <fixedLineHeight> <true /> </fixedLineHeight>
  51.         <autoTab> <false /> </autoTab>
  52.         <lockText> <false /> </lockText>
  53.         <rect>
  54.             <left>184</left>
  55.             <top>116</top>
  56.             <right>510</right>
  57.             <bottom>173</bottom>
  58.         </rect>
  59.         <style>rectangle</style>
  60.         <autoSelect> <false /> </autoSelect>
  61.         <showLines> <false /> </showLines>
  62.         <wideMargins> <true /> </wideMargins>
  63.         <multipleLines> <false /> </multipleLines>
  64.         <reservedFamily> 0 </reservedFamily>
  65.         <titleWidth>0</titleWidth>
  66.         <icon>0</icon>
  67.         <textAlign>left</textAlign>
  68.         <font>Chicago</font>
  69.         <textSize>12</textSize>
  70.         <textStyle>plain</textStyle>
  71.         <textHeight>16</textHeight>
  72.         <name>toFind</name>
  73.         <script>on returnInFieldsend MouseUp to btn "start Search"end returnInFieldon enterInFieldsend MouseUp to btn "start Search"end enterInFieldon closefieldglobal gFindStringput me into gFindStringend closefield</script>
  74.     </part>
  75.     <part>
  76.         <id>44</id>
  77.         <type>field</type>
  78.         <visible> <true /> </visible>
  79.         <dontWrap> <false /> </dontWrap>
  80.         <dontSearch> <false /> </dontSearch>
  81.         <sharedText> <false /> </sharedText>
  82.         <fixedLineHeight> <true /> </fixedLineHeight>
  83.         <autoTab> <false /> </autoTab>
  84.         <lockText> <true /> </lockText>
  85.         <rect>
  86.             <left>183</left>
  87.             <top>177</top>
  88.             <right>364</right>
  89.             <bottom>193</bottom>
  90.         </rect>
  91.         <style>transparent</style>
  92.         <autoSelect> <false /> </autoSelect>
  93.         <showLines> <false /> </showLines>
  94.         <wideMargins> <false /> </wideMargins>
  95.         <multipleLines> <false /> </multipleLines>
  96.         <reservedFamily> 0 </reservedFamily>
  97.         <titleWidth>0</titleWidth>
  98.         <icon>0</icon>
  99.         <textAlign>left</textAlign>
  100.         <font>Geneva</font>
  101.         <textSize>9</textSize>
  102.         <textStyle>plain</textStyle>
  103.         <textHeight>12</textHeight>
  104.         <name>hitz</name>
  105.         <script></script>
  106.     </part>
  107.     <part>
  108.         <id>55</id>
  109.         <type>button</type>
  110.         <visible> <true /> </visible>
  111.         <reserved5> 0 </reserved5>
  112.         <reserved4> 0 </reserved4>
  113.         <reserved3> 0 </reserved3>
  114.         <reserved2> 0 </reserved2>
  115.         <reserved1> 0 </reserved1>
  116.         <enabled> <true /> </enabled>
  117.         <rect>
  118.             <left>347</left>
  119.             <top>176</top>
  120.             <right>399</right>
  121.             <bottom>192</bottom>
  122.         </rect>
  123.         <style>transparent</style>
  124.         <showName> <false /> </showName>
  125.         <highlight> <false /> </highlight>
  126.         <autoHighlight> <false /> </autoHighlight>
  127.         <sharedHighlight> <true /> </sharedHighlight>
  128.         <family>0</family>
  129.         <titleWidth>0</titleWidth>
  130.         <icon>0</icon>
  131.         <textAlign>center</textAlign>
  132.         <font>Chicago</font>
  133.         <textSize>12</textSize>
  134.         <textStyle>plain</textStyle>
  135.         <name>Clear</name>
  136.         <script>on mouseUpglobal gCardTitles,gFindStringput getInsertionPoint() into insertionPointset cursor to 4set hilite of me to truelock screenput "" into bg fld "toFind"put "" into bg fld "Found Files"put "" into gCardTitlesput "" into gFindStringput "" into fld "hitz"select text of fld "toFind"unlock screenset hilite of me to falseselect before char insertionPoint of fld "toFind"end mouseUp</script>
  137.     </part>
  138.     <part>
  139.         <id>59</id>
  140.         <type>field</type>
  141.         <visible> <true /> </visible>
  142.         <dontWrap> <false /> </dontWrap>
  143.         <dontSearch> <false /> </dontSearch>
  144.         <sharedText> <false /> </sharedText>
  145.         <fixedLineHeight> <true /> </fixedLineHeight>
  146.         <autoTab> <false /> </autoTab>
  147.         <lockText> <true /> </lockText>
  148.         <rect>
  149.             <left>4</left>
  150.             <top>116</top>
  151.             <right>179</right>
  152.             <bottom>287</bottom>
  153.         </rect>
  154.         <style>scrolling</style>
  155.         <autoSelect> <false /> </autoSelect>
  156.         <showLines> <false /> </showLines>
  157.         <wideMargins> <false /> </wideMargins>
  158.         <multipleLines> <false /> </multipleLines>
  159.         <reservedFamily> 0 </reservedFamily>
  160.         <titleWidth>0</titleWidth>
  161.         <icon>0</icon>
  162.         <textAlign>left</textAlign>
  163.         <font>Monaco</font>
  164.         <textSize>9</textSize>
  165.         <textStyle>plain</textStyle>
  166.         <textHeight>13</textHeight>
  167.         <name>keyList</name>
  168.         <script>on mouseDownglobal QueryChunkput GetChunk() into QueryChunkput word 2 of the clickLine into theLineput line theLine of me into theWordif theWord = "" then exit mouseDownspinCursorselectLine theLine,name of meput replaceChunk(theWord,QueryChunk) into QueryChunkend mouseDown</script>
  169.     </part>
  170.     <name>find File</name>
  171.     <script></script>
  172. </background>
  173.